**************************************************
********* Figure 1: Probability of Ballot Presence
********* and Latina/o Proportion of Population: * 
********* 1996-2015 ******************************
**************************************************
do "do_files/prep_GRACE_data/load_prep_GRACE_data.do"

preserve

gen pipe = "|"
gen where = -0.3

twoway (lpolyci basket_latw latpoppct if v12==1, clpattern(dash) fintensity(20)) (lpolyci basket_latm latpoppct if v12==1 , fintensity(20))(scatter where latpoppct if taglatreppop==1 & tagRlatpoppct==1,m(i) ml( pipe) mlabpos(0) mlabsize(small)), ytitle("Probability of Ballot Presence") ytitle(, size(medium)) ylabel(0(.2).8) xtitle(Average Latina/o Proportion of Population) xtitle(, size(medium)) title(, size(medium)) legend(order(2 "Latinas" 4 "Latinos"))

* pausing for users who might be looping through all replication files
pause
